/ SGI Freeware 1999 August / SGI Freeware 1999 August.iso / dist / fw_xemacs.idb / usr / freeware / lib / xemacs-20.4 / lisp / efs / efs-netrc.elc.z / efs-netrc.elc

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 14 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 6a 75 73 74 69 6e 62 |piled by| justinb|
|00000020| 40 65 62 6f 6e 79 2e 63 | 72 61 79 2e 63 6f 6d 20 |@ebony.c|ray.com |
|00000030| 6f 6e 20 4d 6f 6e 20 4d | 61 72 20 20 39 20 31 32 |on Mon M|ar  9 12|
|00000040| 3a 35 38 3a 31 39 20 31 | 39 39 38 0a 3b 3b 3b 20 |:58:19 1|998.;;; |
|00000050| 66 72 6f 6d 20 66 69 6c | 65 20 2f 68 6f 6d 65 2f |from fil|e /home/|
|00000060| 61 73 70 65 6e 30 37 2f | 6a 75 73 74 69 6e 62 2f |aspen07/|justinb/|
|00000070| 72 6f 6f 74 73 2f 66 72 | 65 65 77 61 72 65 2f 78 |roots/fr|eeware/x|
|00000080| 65 6d 61 63 73 2f 32 30 | 2e 33 2f 78 65 6d 61 63 |emacs/20|.3/xemac|
|00000090| 73 2d 32 30 2e 33 2f 6c | 69 73 70 2f 65 66 73 2f |s-20.3/l|isp/efs/|
|000000a0| 65 66 73 2d 6e 65 74 72 | 63 2e 65 6c 0a 3b 3b 3b |efs-netr|c.el.;;;|
|000000b0| 20 65 6d 61 63 73 20 76 | 65 72 73 69 6f 6e 20 32 | emacs v|ersion 2|
|000000c0| 30 2e 34 20 22 45 6d 65 | 72 61 6c 64 22 20 58 45 |0.4 "Eme|rald" XE|
|000000d0| 6d 61 63 73 20 20 4c 75 | 63 69 64 2e 0a 3b 3b 3b |macs  Lu|cid..;;;|
|000000e0| 20 62 79 74 65 63 6f 6d | 70 20 76 65 72 73 69 6f | bytecom|p versio|
|000000f0| 6e 20 32 2e 32 35 20 58 | 45 6d 61 63 73 3b 20 32 |n 2.25 X|Emacs; 2|
|00000100| 32 2d 4d 61 72 2d 39 36 | 2e 0a 3b 3b 3b 20 6f 70 |2-Mar-96|..;;; op|
|00000110| 74 69 6d 69 7a 61 74 69 | 6f 6e 20 69 73 20 6f 6e |timizati|on is on|
|00000120| 2e 0a 3b 3b 3b 20 74 68 | 69 73 20 66 69 6c 65 20 |..;;; th|is file |
|00000130| 75 73 65 73 20 6f 70 63 | 6f 64 65 73 20 77 68 69 |uses opc|odes whi|
|00000140| 63 68 20 64 6f 20 6e 6f | 74 20 65 78 69 73 74 20 |ch do no|t exist |
|00000150| 69 6e 20 45 6d 61 63 73 | 20 31 39 2e 0a 0a 28 69 |in Emacs| 19...(i|
|00000160| 66 20 28 61 6e 64 20 28 | 62 6f 75 6e 64 70 20 27 |f (and (|boundp '|
|00000170| 65 6d 61 63 73 2d 76 65 | 72 73 69 6f 6e 29 0a 09 |emacs-ve|rsion)..|
|00000180| 20 28 6f 72 20 28 61 6e | 64 20 28 62 6f 75 6e 64 | (or (an|d (bound|
|00000190| 70 20 27 65 70 6f 63 68 | 3a 3a 76 65 72 73 69 6f |p 'epoch|::versio|
|000001a0| 6e 29 20 65 70 6f 63 68 | 3a 3a 76 65 72 73 69 6f |n) epoch|::versio|
|000001b0| 6e 29 0a 09 20 20 20 20 | 20 28 73 74 72 69 6e 67 |n)..    | (string|
|000001c0| 2d 6c 65 73 73 70 20 65 | 6d 61 63 73 2d 76 65 72 |-lessp e|macs-ver|
|000001d0| 73 69 6f 6e 20 22 32 30 | 22 29 29 29 0a 20 20 20 |sion "20|"))).   |
|000001e0| 20 28 65 72 72 6f 72 20 | 22 60 65 66 73 2d 6e 65 | (error |"`efs-ne|
|000001f0| 74 72 63 2e 65 6c 27 20 | 77 61 73 20 63 6f 6d 70 |trc.el' |was comp|
|00000200| 69 6c 65 64 20 66 6f 72 | 20 45 6d 61 63 73 20 32 |iled for| Emacs 2|
|00000210| 30 22 29 29 0a 0a 28 6f | 72 20 28 62 6f 75 6e 64 |0"))..(o|r (bound|
|00000220| 70 20 27 63 75 72 72 65 | 6e 74 2d 6c 6f 61 64 2d |p 'curre|nt-load-|
|00000230| 6c 69 73 74 29 20 28 73 | 65 74 71 20 63 75 72 72 |list) (s|etq curr|
|00000240| 65 6e 74 2d 6c 6f 61 64 | 2d 6c 69 73 74 20 6e 69 |ent-load|-list ni|
|00000250| 6c 29 29 0a 0a 0a 28 62 | 79 74 65 2d 63 6f 64 65 |l))...(b|yte-code|
|00000260| 20 22 c0 c1 21 88 c2 c3 | 21 88 c2 c4 21 88 c2 c5 | "..!...|!...!...|
|00000270| 21 88 c2 c6 21 88 c7 c8 | c9 4f ca cb cc c9 4f 51 |!...!...|.O....OQ|
|00000280| 16 0d cd 0e 0e 42 16 0e | cf 0e 0e 42 16 0e c0 87 |.....B..|...B....|
|00000290| 22 20 5b 70 72 6f 76 69 | 64 65 20 65 66 73 2d 6e |" [provi|de efs-n|
|000002a0| 65 74 72 63 20 72 65 71 | 75 69 72 65 20 65 66 73 |etrc req|uire efs|
|000002b0| 2d 63 75 20 65 66 73 2d | 6f 76 77 72 74 20 70 61 |-cu efs-|ovwrt pa|
|000002c0| 73 73 77 64 20 65 66 73 | 2d 66 6e 68 20 22 24 65 |sswd efs|-fnh "$e|
|000002d0| 66 73 20 72 65 6c 65 61 | 73 65 3a 20 31 2e 31 35 |fs relea|se: 1.15|
|000002e0| 20 24 22 20 31 34 20 2d | 32 20 22 2f 22 20 22 23 | $" 14 -|2 "/" "#|
|000002f0| 52 65 76 69 73 69 6f 6e | 3a 20 31 2e 32 20 24 22 |Revision|: 1.2 $"|
|00000300| 20 31 31 20 65 66 73 2d | 6e 65 74 72 63 2d 76 65 | 11 efs-|netrc-ve|
|00000310| 72 73 69 6f 6e 20 63 75 | 72 72 65 6e 74 2d 6c 6f |rsion cu|rrent-lo|
|00000320| 61 64 2d 6c 69 73 74 20 | 64 69 72 65 64 2d 64 69 |ad-list |dired-di|
|00000330| 72 65 63 74 6f 72 79 5d | 20 35 29 0a 23 40 33 32 |rectory]| 5).#@32|
|00000340| 33 20 2a 46 69 6c 65 20 | 69 6e 20 2e 6e 65 74 72 |3 *File |in .netr|
|00000350| 63 20 66 6f 72 6d 61 74 | 20 74 6f 20 73 65 61 72 |c format| to sear|
|00000360| 63 68 20 66 6f 72 20 70 | 61 73 73 77 6f 72 64 73 |ch for p|asswords|
|00000370| 2e 0a 49 66 20 79 6f 75 | 20 65 6e 63 72 79 70 74 |..If you| encrypt|
|00000380| 20 74 68 69 73 20 66 69 | 6c 65 2c 20 6e 61 6d 65 | this fi|le, name|
|00000390| 20 69 74 20 73 6f 6d 65 | 74 68 69 6e 67 20 6f 74 | it some|thing ot|
|000003a0| 68 65 72 20 74 68 61 6e | 20 7e 2f 2e 6e 65 74 72 |her than| ~/.netr|
|000003b0| 63 2e 20 4f 74 68 65 72 | 77 69 73 65 2c 0a 6f 72 |c. Other|wise,.or|
|000003c0| 64 69 6e 61 72 79 20 46 | 54 50 20 77 69 6c 6c 20 |dinary F|TP will |
|000003d0| 62 6f 6d 62 2e 0a 0a 49 | 66 20 79 6f 75 20 68 61 |bomb...I|f you ha|
|000003e0| 76 65 20 61 6e 79 20 63 | 72 79 70 74 69 6f 6e 20 |ve any c|ryption |
|000003f0| 70 61 63 6b 61 67 65 20 | 72 75 6e 6e 69 6e 67 20 |package |running |
|00000400| 6f 66 66 20 6f 66 20 66 | 69 6e 64 2d 66 69 6c 65 |off of f|ind-file|
|00000410| 2d 68 6f 6f 6b 73 0a 28 | 73 75 63 68 20 61 73 20 |-hooks.(|such as |
|00000420| 63 72 79 70 74 2e 65 6c | 20 6f 72 20 63 72 79 70 |crypt.el| or cryp|
|00000430| 74 2b 2b 2e 65 6c 29 2c | 20 65 66 73 20 77 69 6c |t++.el),| efs wil|
|00000440| 6c 20 75 73 65 20 69 74 | 20 74 6f 20 64 65 63 72 |l use it| to decr|
|00000450| 79 70 74 20 74 68 69 73 | 20 66 69 6c 65 2e 0a 45 |ypt this| file..E|
|00000460| 6e 63 72 79 70 74 69 6e | 67 20 74 68 69 73 20 66 |ncryptin|g this f|
|00000470| 69 6c 65 20 69 73 20 61 | 20 67 6f 6f 64 20 69 64 |ile is a| good id|
|00000480| 65 61 21 1f 0a 28 64 65 | 66 76 61 72 20 65 66 73 |ea!..(de|fvar efs|
|00000490| 2d 6e 65 74 72 63 2d 66 | 69 6c 65 6e 61 6d 65 20 |-netrc-f|ilename |
|000004a0| 22 7e 2f 2e 6e 65 74 72 | 63 22 20 28 23 24 20 2e |"~/.netr|c" (#$ .|
|000004b0| 20 2d 38 33 34 29 29 0a | 23 40 36 36 20 2a 49 66 | -834)).|#@66 *If|
|000004c0| 20 6e 6f 6e 2d 6e 69 6c | 20 61 76 6f 69 64 20 63 | non-nil| avoid c|
|000004d0| 68 65 63 6b 69 6e 67 20 | 70 65 72 6d 69 73 73 69 |hecking |permissi|
|000004e0| 6f 6e 73 20 66 6f 72 20 | 60 65 66 73 2d 6e 65 74 |ons for |`efs-net|
|000004f0| 72 63 2d 66 69 6c 65 6e | 61 6d 65 27 2e 1f 0a 28 |rc-filen|ame'...(|
|00000500| 64 65 66 76 61 72 20 65 | 66 73 2d 64 69 73 61 62 |defvar e|fs-disab|
|00000510| 6c 65 2d 6e 65 74 72 63 | 2d 73 65 63 75 72 69 74 |le-netrc|-securit|
|00000520| 79 2d 63 68 65 63 6b 20 | 6e 69 6c 20 28 23 24 20 |y-check |nil (#$ |
|00000530| 2e 20 2d 31 32 31 33 29 | 29 0a 23 40 36 37 20 46 |. -1213)|).#@67 F|
|00000540| 6f 72 20 61 20 67 69 76 | 65 6e 20 48 4f 53 54 20 |or a giv|en HOST |
|00000550| 61 6e 64 20 55 53 45 52 | 2c 20 73 65 74 20 6f 72 |and USER|, set or|
|00000560| 20 63 68 61 6e 67 65 20 | 74 68 65 20 61 73 73 6f | change |the asso|
|00000570| 63 69 61 74 65 64 20 50 | 41 53 53 57 4f 52 44 2e |ciated P|ASSWORD.|
|00000580| 1f 0a 28 64 65 66 61 6c | 69 61 73 20 27 65 66 73 |..(defal|ias 'efs|
|00000590| 2d 73 65 74 2d 70 61 73 | 73 77 64 20 23 5b 28 68 |-set-pas|swd #[(h|
|000005a0| 6f 73 74 20 75 73 65 72 | 20 70 61 73 73 77 64 29 |ost user| passwd)|
|000005b0| 20 22 c0 09 5c 6e c3 0b | ad 83 c4 0b 21 24 87 22 | "..\n..|....!$."|
|000005c0| 20 5b 65 66 73 2d 73 65 | 74 2d 68 6f 73 74 2d 75 | [efs-se|t-host-u|
|000005d0| 73 65 72 2d 70 72 6f 70 | 65 72 74 79 20 68 6f 73 |ser-prop|erty hos|
|000005e0| 74 20 75 73 65 72 20 70 | 61 73 73 77 64 20 65 66 |t user p|asswd ef|
|000005f0| 73 2d 63 6f 64 65 2d 73 | 74 72 69 6e 67 5d 20 36 |s-code-s|tring] 6|
|00000600| 20 28 23 24 20 2e 20 31 | 33 34 33 29 20 28 6c 69 | (#$ . 1|343) (li|
|00000610| 73 74 20 28 72 65 61 64 | 2d 73 74 72 69 6e 67 20 |st (read|-string |
|00000620| 22 48 6f 73 74 3a 20 22 | 29 20 28 72 65 61 64 2d |"Host: "|) (read-|
|00000630| 73 74 72 69 6e 67 20 22 | 55 73 65 72 3a 20 22 29 |string "|User: ")|
|00000640| 20 28 72 65 61 64 2d 70 | 61 73 73 77 64 20 22 50 | (read-p|asswd "P|
|00000650| 61 73 73 77 6f 72 64 3a | 20 22 29 29 5d 29 0a 23 |assword:| "))]).#|
|00000660| 40 32 30 38 20 47 69 76 | 65 6e 20 48 4f 53 54 2c |@208 Giv|en HOST,|
|00000670| 20 55 53 45 52 2c 20 61 | 6e 64 20 4d 49 4e 49 44 | USER, a|nd MINID|
|00000680| 49 53 4b 2c 20 73 65 74 | 20 6f 72 20 63 68 61 6e |ISK, set| or chan|
|00000690| 67 65 20 74 68 65 20 41 | 43 43 4f 55 4e 54 20 70 |ge the A|CCOUNT p|
|000006a0| 61 73 73 77 6f 72 64 2e | 0a 54 68 65 20 6d 69 6e |assword.|.The min|
|000006b0| 69 64 69 73 6b 20 69 73 | 20 6f 6e 6c 79 20 72 65 |idisk is| only re|
|000006c0| 6c 65 76 61 6e 74 20 66 | 6f 72 20 43 4d 53 2e 20 |levant f|or CMS. |
|000006d0| 49 66 20 6d 69 6e 69 64 | 69 73 6b 20 69 73 20 69 |If minid|isk is i|
|000006e0| 72 72 65 6c 65 76 61 6e | 74 2c 0a 67 69 76 65 20 |rrelevan|t,.give |
|000006f0| 74 68 65 20 6e 75 6c 6c | 20 73 74 72 69 6e 67 20 |the null| string |
|00000700| 66 6f 72 20 69 74 2e 20 | 49 6e 20 6c 69 73 70 20 |for it. |In lisp |
|00000710| 70 72 6f 67 72 61 6d 73 | 2c 20 67 69 76 65 20 74 |programs|, give t|
|00000720| 68 65 20 6d 69 6e 69 64 | 69 73 6b 20 61 73 20 6e |he minid|isk as n|
|00000730| 69 6c 2e 1f 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |il...(de|falias '|
|00000740| 65 66 73 2d 73 65 74 2d | 61 63 63 6f 75 6e 74 20 |efs-set-|account |
|00000750| 23 5b 28 68 6f 73 74 20 | 75 73 65 72 20 6d 69 6e |#[(host |user min|
|00000760| 69 64 69 73 6b 20 61 63 | 63 6f 75 6e 74 29 20 22 |idisk ac|count) "|
|00000770| 08 ab 84 c1 08 21 10 5c | 6e ab a9 0b 97 c4 0d c4 |.....!.\|n.......|
|00000780| 5c 6e b0 05 89 1e 06 3b | ab 84 0e 06 aa 84 c7 0e |\n.....;|........|
|00000790| 06 21 29 1e 06 c8 0e 06 | 0e 09 5c 22 1e 5c 6e cb |.!).....|..\".\n.|
|000007a0| 0e 5c 6e cc 08 23 2a 87 | cd 0b 0d c0 08 24 87 22 |.\n..#*.|.....$."|
|000007b0| 20 5b 61 63 63 6f 75 6e | 74 20 65 66 73 2d 63 6f | [accoun|t efs-co|
|000007c0| 64 65 2d 73 74 72 69 6e | 67 20 6d 69 6e 69 64 69 |de-strin|g minidi|
|000007d0| 73 6b 20 68 6f 73 74 20 | 22 2f 22 20 75 73 65 72 |sk host |"/" user|
|000007e0| 20 6b 65 79 20 70 72 69 | 6e 31 2d 74 6f 2d 73 74 | key pri|n1-to-st|
|000007f0| 72 69 6e 67 20 69 6e 74 | 65 72 6e 20 65 66 73 2d |ring int|ern efs-|
|00000800| 6d 69 6e 69 64 69 73 6b | 2d 68 61 73 68 74 61 62 |minidisk|-hashtab|
|00000810| 6c 65 20 73 79 6d 20 70 | 75 74 20 76 61 6c 20 65 |le sym p|ut val e|
|00000820| 66 73 2d 73 65 74 2d 68 | 6f 73 74 2d 75 73 65 72 |fs-set-h|ost-user|
|00000830| 2d 70 72 6f 70 65 72 74 | 79 5d 20 36 20 28 23 24 |-propert|y] 6 (#$|
|00000840| 20 2e 20 31 36 33 37 29 | 20 28 62 79 74 65 2d 63 | . 1637)| (byte-c|
|00000850| 6f 64 65 20 22 c0 20 70 | 09 1a 1b 1c c5 8e c6 11 |ode ". p|........|
|00000860| 0e 07 ae 88 0e 08 c9 61 | ad 82 0e 5c 6e 89 1e 0b |.......a|...\n...|
|00000870| ad 84 cc 0e 0b 21 89 1e | 0d 40 1e 0e 0e 0d 41 40 |.....!..|.@....A@|
|00000880| 1e 0f 0e 0d ad 9a d0 0e | 0e 21 d1 61 ad 92 d2 d3 |........|.!.a....|
|00000890| d4 0e 0d 38 5c 22 ad 89 | d4 0e 0d 38 d5 d6 95 53 |...8\"..|...8...S|
|000008a0| 4f 1e 17 d8 d9 0e 0e 5c | 22 1e 1a d8 db 0e 0f 5c |O......\|"......\|
|000008b0| 22 1e 1c d8 dd 0e 17 5c | 22 1e 1e df e0 21 1e 21 |"......\|"....!.!|
|000008c0| d2 e2 0e 1e 5c 22 ab 83 | c6 16 1e 0e 1a 0e 1c 0e |....\"..|........|
|000008d0| 1e 0e 21 46 2e 0d 87 22 | 20 5b 6d 61 74 63 68 2d |..!F..."| [match-|
|000008e0| 64 61 74 61 20 63 61 73 | 65 2d 66 6f 6c 64 2d 73 |data cas|e-fold-s|
|000008f0| 65 61 72 63 68 20 63 66 | 73 20 62 75 66 66 20 6d |earch cf|s buff m|
|00000900| 61 74 63 68 2d 64 61 74 | 61 20 28 28 62 79 74 65 |atch-dat|a ((byte|
|00000910| 2d 63 6f 64 65 20 22 c0 | c1 c2 8f 88 c3 0c 21 87 |-code ".|......!.|
|00000920| 22 20 5b 6e 69 6c 20 28 | 62 79 74 65 2d 63 6f 64 |" [nil (|byte-cod|
|00000930| 65 20 22 8a 08 71 88 09 | 12 29 c3 87 22 20 5b 62 |e "..q..|.).." [b|
|00000940| 75 66 66 20 63 66 73 20 | 63 61 73 65 2d 66 6f 6c |uff cfs |case-fol|
|00000950| 64 2d 73 65 61 72 63 68 | 20 6e 69 6c 5d 20 31 29 |d-search| nil] 1)|
|00000960| 20 28 28 65 72 72 6f 72 | 29 29 20 73 74 6f 72 65 | ((error|)) store|
|00000970| 2d 6d 61 74 63 68 2d 64 | 61 74 61 20 6d 61 74 63 |-match-d|ata matc|
|00000980| 68 2d 64 61 74 61 5d 20 | 33 29 29 20 6e 69 6c 20 |h-data] |3)) nil |
|00000990| 62 75 66 66 65 72 2d 66 | 69 6c 65 2d 6e 61 6d 65 |buffer-f|ile-name|
|000009a0| 20 6d 61 6a 6f 72 2d 6d | 6f 64 65 20 64 69 72 65 | major-m|ode dire|
|000009b0| 64 2d 6d 6f 64 65 20 64 | 69 72 65 64 2d 64 69 72 |d-mode d|ired-dir|
|000009c0| 65 63 74 6f 72 79 20 70 | 61 74 68 20 65 66 73 2d |ectory p|ath efs-|
|000009d0| 66 74 70 2d 70 61 74 68 | 20 70 61 72 73 65 64 20 |ftp-path| parsed |
|000009e0| 64 65 66 61 75 6c 74 2d | 68 6f 73 74 20 64 65 66 |default-|host def|
|000009f0| 61 75 6c 74 2d 75 73 65 | 72 20 65 66 73 2d 68 6f |ault-use|r efs-ho|
|00000a00| 73 74 2d 74 79 70 65 20 | 63 6d 73 20 73 74 72 69 |st-type |cms stri|
|00000a10| 6e 67 2d 6d 61 74 63 68 | 20 22 5e 2f 5b 5e 2f 5d |ng-match| "^/[^/]|
|00000a20| 2b 2f 22 20 32 20 31 20 | 30 20 64 65 66 61 75 6c |+/" 2 1 |0 defaul|
|00000a30| 74 2d 6d 69 6e 69 64 69 | 73 6b 20 72 65 61 64 2d |t-minidi|sk read-|
|00000a40| 73 74 72 69 6e 67 20 22 | 48 6f 73 74 3a 20 22 20 |string "|Host: " |
|00000a50| 68 6f 73 74 20 22 55 73 | 65 72 3a 20 22 20 75 73 |host "Us|er: " us|
|00000a60| 65 72 20 22 4d 69 6e 69 | 64 69 73 6b 20 28 65 6e |er "Mini|disk (en|
|00000a70| 74 65 72 20 6e 75 6c 6c | 20 73 74 72 69 6e 67 20 |ter null| string |
|00000a80| 69 66 20 69 6e 61 70 70 | 6c 69 63 61 62 6c 65 29 |if inapp|licable)|
|00000a90| 3a 20 22 20 6d 69 6e 69 | 64 69 73 6b 20 72 65 61 |: " mini|disk rea|
|00000aa0| 64 2d 70 61 73 73 77 64 | 20 22 41 63 63 6f 75 6e |d-passwd| "Accoun|
|00000ab0| 74 20 70 61 73 73 77 6f | 72 64 3a 20 22 20 61 63 |t passwo|rd: " ac|
|00000ac0| 63 6f 75 6e 74 20 22 5e | 20 2a 24 22 5d 20 35 29 |count "^| *$"] 5)|
|00000ad0| 5d 29 0a 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c0 |]).(byte|-code ".|
|00000ae0| 11 c1 5c 6e 42 12 c0 87 | 22 20 5b 6e 69 6c 20 65 |..\nB...|" [nil e|
|00000af0| 66 73 2d 6e 65 74 72 63 | 2d 6d 6f 64 74 69 6d 65 |fs-netrc|-modtime|
|00000b00| 20 63 75 72 72 65 6e 74 | 2d 6c 6f 61 64 2d 6c 69 | current|-load-li|
|00000b10| 73 74 5d 20 32 29 0a 28 | 64 65 66 61 6c 69 61 73 |st] 2).(|defalias|
|00000b20| 20 27 65 66 73 2d 6e 65 | 74 72 63 2d 6e 65 78 74 | 'efs-ne|trc-next|
|00000b30| 2d 74 6f 6b 65 6e 20 23 | 5b 6e 69 6c 20 22 c0 c1 |-token #|[nil "..|
|00000b40| 77 88 60 66 c2 61 ab 89 | c3 79 88 c0 c1 77 88 aa |w.`f.a..|.y...w..|
|00000b50| 71 6d 3f ad 88 60 c4 c1 | 77 88 60 7b 97 89 1d ac |qm?..`..|w.`{....|
|00000b60| 83 c1 aa ed 0d c6 98 ab | 84 0d 43 aa e4 0d c7 c8 |........|..C.....|
|00000b70| c9 ca 46 b6 ab 86 0d cb | 20 44 aa d5 0d cc 98 ab |..F.....| D......|
|00000b80| 88 0d cb 20 cb 20 45 aa | c8 0d cd 98 ab 9b 60 ce |... . E.|......`.|
|00000b90| 5a cf cb 20 21 1e 10 89 | 1e 11 60 7c 88 8a d2 0e |Z.. !...|..`|....|
|00000ba0| 10 21 63 88 2b d3 20 aa | a8 0d d4 98 ab 9f d5 20 |.!c.+. .|....... |
|00000bb0| 70 0e 16 1e 17 1e 18 1e | 19 da 8e c1 16 16 db dc |p.......|........|
|00000bc0| c1 dd 23 88 2c 6d 3f ad | 88 d3 20 aa 84 de df 0d |..#.,m?.|.. .....|
|00000bd0| 5c 22 29 87 22 20 5b 22 | 20 09 5c 6e 22 20 6e 69 |\")." ["| .\n" ni|
|00000be0| 6c 20 3f 5c 23 20 31 20 | 22 5e 20 5c 6e 09 22 20 |l ?\# 1 |"^ \n." |
|00000bf0| 74 6f 6b 20 22 64 65 66 | 61 75 6c 74 22 20 22 6d |tok "def|ault" "m|
|00000c00| 61 63 68 69 6e 65 22 20 | 22 6c 6f 67 69 6e 22 20 |achine" |"login" |
|00000c10| 22 70 61 73 73 77 6f 72 | 64 22 20 22 61 63 63 6f |"passwor|d" "acco|
|00000c20| 75 6e 74 22 20 65 66 73 | 2d 6e 65 74 72 63 2d 72 |unt" efs|-netrc-r|
|00000c30| 65 61 64 2d 74 6f 6b 65 | 6e 2d 76 61 6c 75 65 20 |ead-toke|n-value |
|00000c40| 22 6d 69 6e 69 64 69 73 | 6b 22 20 22 69 6e 63 6c |"minidis|k" "incl|
|00000c50| 75 64 65 22 20 37 20 65 | 78 70 61 6e 64 2d 66 69 |ude" 7 e|xpand-fi|
|00000c60| 6c 65 2d 6e 61 6d 65 20 | 70 61 74 68 20 73 74 61 |le-name |path sta|
|00000c70| 72 74 20 65 66 73 2d 6e | 65 74 72 63 2d 67 65 74 |rt efs-n|etrc-get|
|00000c80| 2d 69 6e 63 6c 75 64 65 | 20 65 66 73 2d 6e 65 74 |-include| efs-net|
|00000c90| 72 63 2d 6e 65 78 74 2d | 74 6f 6b 65 6e 20 22 6d |rc-next-|token "m|
|00000ca0| 61 63 64 65 66 22 20 6d | 61 74 63 68 2d 64 61 74 |acdef" m|atch-dat|
|00000cb0| 61 20 63 61 73 65 2d 66 | 6f 6c 64 2d 73 65 61 72 |a case-f|old-sear|
|00000cc0| 63 68 20 63 66 73 20 62 | 75 66 66 20 6d 61 74 63 |ch cfs b|uff matc|
|00000cd0| 68 2d 64 61 74 61 20 28 | 28 62 79 74 65 2d 63 6f |h-data (|(byte-co|
|00000ce0| 64 65 20 22 c0 c1 c2 8f | 88 c3 0c 21 87 22 20 5b |de "....|...!." [|
|00000cf0| 6e 69 6c 20 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |nil (byt|e-code "|
|00000d00| 8a 08 71 88 09 12 29 c3 | 87 22 20 5b 62 75 66 66 |..q...).|." [buff|
|00000d10| 20 63 66 73 20 63 61 73 | 65 2d 66 6f 6c 64 2d 73 | cfs cas|e-fold-s|
|00000d20| 65 61 72 63 68 20 6e 69 | 6c 5d 20 31 29 20 28 28 |earch ni|l] 1) ((|
|00000d30| 65 72 72 6f 72 29 29 20 | 73 74 6f 72 65 2d 6d 61 |error)) |store-ma|
|00000d40| 74 63 68 2d 64 61 74 61 | 20 6d 61 74 63 68 2d 64 |tch-data| match-d|
|00000d50| 61 74 61 5d 20 33 29 29 | 20 73 65 61 72 63 68 2d |ata] 3))| search-|
|00000d60| 66 6f 72 77 61 72 64 20 | 22 5c 6e 5c 6e 22 20 6d |forward |"\n\n" m|
|00000d70| 6f 76 65 20 65 72 72 6f | 72 20 22 65 66 73 20 6e |ove erro|r "efs n|
|00000d80| 65 74 72 63 20 66 69 6c | 65 20 65 72 72 6f 72 3a |etrc fil|e error:|
|00000d90| 20 49 6e 76 61 6c 69 64 | 20 74 6f 6b 65 6e 20 25 | Invalid| token %|
|00000da0| 73 2e 22 5d 20 36 5d 29 | 0a 28 64 65 66 61 6c 69 |s."] 6])|.(defali|
|00000db0| 61 73 20 27 65 66 73 2d | 6e 65 74 72 63 2d 72 65 |as 'efs-|netrc-re|
|00000dc0| 61 64 2d 74 6f 6b 65 6e | 2d 76 61 6c 75 65 20 23 |ad-token|-value #|
|00000dd0| 5b 6e 69 6c 20 22 c0 c1 | 77 88 60 66 c2 61 ab 89 |[nil "..|w.`f.a..|
|00000de0| c3 79 88 c0 c1 77 88 aa | 71 67 c4 61 ab 8e c3 75 |.y...w..|qg.a...u|
|00000df0| 88 60 c5 c1 77 88 60 7b | c3 75 88 87 60 c6 c1 77 |.`..w.`{|.u..`..w|
|00000e00| 88 60 7b 87 22 20 5b 22 | 20 09 5c 6e 22 20 6e 69 |.`{." ["| .\n" ni|
|00000e10| 6c 20 3f 5c 23 20 31 20 | 3f 5c 22 20 22 5e 5c 22 |l ?\# 1 |?\" "^\"|
|00000e20| 22 20 22 5e 20 5c 6e 09 | 22 5d 20 33 5d 29 0a 28 |" "^ \n.|"] 3]).(|
|00000e30| 64 65 66 61 6c 69 61 73 | 20 27 65 66 73 2d 6e 65 |defalias| 'efs-ne|
|00000e40| 74 72 63 2d 67 65 74 2d | 69 6e 63 6c 75 64 65 20 |trc-get-|include |
|00000e50| 23 5b 28 70 61 74 68 29 | 20 22 c0 09 21 1a c3 8e |#[(path)| "..!...|
|00000e60| 8a 5c 6e 71 88 09 14 c5 | 09 21 16 06 c7 09 21 88 |.\nq....|.!....!.|
|00000e70| c8 c9 21 88 ca cb 0e 0c | 5c 22 88 cd 14 ce 20 2b |..!.....|\".... +|
|00000e80| 87 22 20 5b 63 72 65 61 | 74 65 2d 66 69 6c 65 2d |." [crea|te-file-|
|00000e90| 62 75 66 66 65 72 20 70 | 61 74 68 20 62 75 66 66 |buffer p|ath buff|
|00000ea0| 20 28 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 c1 | ((byte-|code "..|
|00000eb0| c2 8f 87 22 20 5b 6e 69 | 6c 20 28 62 79 74 65 2d |..." [ni|l (byte-|
|00000ec0| 63 6f 64 65 20 22 8a 08 | 71 88 c1 c2 21 88 c3 08 |code "..|q...!...|
|00000ed0| 21 88 29 c2 87 22 20 5b | 62 75 66 66 20 73 65 74 |!.).." [|buff set|
|00000ee0| 2d 62 75 66 66 65 72 2d | 6d 6f 64 69 66 69 65 64 |-buffer-|modified|
|00000ef0| 2d 70 20 6e 69 6c 20 70 | 61 73 73 77 64 2d 6b 69 |-p nil p|asswd-ki|
|00000f00| 6c 6c 2d 62 75 66 66 65 | 72 5d 20 32 29 20 28 28 |ll-buffe|r] 2) ((|
|00000f10| 65 72 72 6f 72 29 29 5d | 20 33 29 29 20 62 75 66 |error))]| 3)) buf|
|00000f20| 66 65 72 2d 66 69 6c 65 | 2d 6e 61 6d 65 20 66 69 |fer-file|-name fi|
|00000f30| 6c 65 2d 6e 61 6d 65 2d | 64 69 72 65 63 74 6f 72 |le-name-|director|
|00000f40| 79 20 64 65 66 61 75 6c | 74 2d 64 69 72 65 63 74 |y defaul|t-direct|
|00000f50| 6f 72 79 20 69 6e 73 65 | 72 74 2d 66 69 6c 65 2d |ory inse|rt-file-|
|00000f60| 63 6f 6e 74 65 6e 74 73 | 20 6e 6f 72 6d 61 6c 2d |contents| normal-|
|00000f70| 6d 6f 64 65 20 74 20 6d | 61 70 63 61 72 20 66 75 |mode t m|apcar fu|
|00000f80| 6e 63 61 6c 6c 20 66 69 | 6e 64 2d 66 69 6c 65 2d |ncall fi|nd-file-|
|00000f90| 68 6f 6f 6b 73 20 6e 69 | 6c 20 62 75 66 66 65 72 |hooks ni|l buffer|
|00000fa0| 2d 73 74 72 69 6e 67 5d | 20 33 5d 29 0a 28 64 65 |-string]| 3]).(de|
|00000fb0| 66 61 6c 69 61 73 20 27 | 65 66 73 2d 70 61 72 73 |falias '|efs-pars|
|00000fc0| 65 2d 6e 65 74 72 63 2d | 67 72 6f 75 70 20 23 5b |e-netrc-|group #[|
|00000fd0| 28 26 6f 70 74 69 6f 6e | 61 6c 20 6d 61 63 68 69 |(&option|al machi|
|00000fe0| 6e 65 29 20 22 c0 89 19 | 1a 0b ac 87 c4 20 89 12 |ne) "...|..... ..|
|00000ff0| 85 17 01 0b ac 94 5c 6e | 40 c5 98 ab 86 5c 6e 41 |......\n|@....\nA|
|00001000| 40 13 aa 88 5c 6e 40 c6 | 98 ab 82 c7 13 c4 20 89 |@...\n@.|...... .|
|00001010| 12 ac 8d 0b 3b ab 85 c8 | 0b c0 5c 22 88 c0 82 17 |....;...|..\"....|
|00001020| 01 5c 6e 40 c5 98 ab 8f | 0b 3b ab 85 c8 0b c0 5c |.\n@....|.;.....\|
|00001030| 22 88 5c 6e 41 40 82 17 | 01 5c 6e 40 c6 98 ab 84 |".\nA@..|.\n@....|
|00001040| c7 82 17 01 5c 6e 40 c9 | 98 ac 92 ca cb 0b c7 61 |....\n@.|.......a|
|00001050| ab 83 c6 aa 84 cc cd 0b | 5c 22 5c 22 82 17 01 5c |........|\"\"...\|
|00001060| 6e 41 40 11 0b c7 61 ab | 85 09 16 0e aa 8c c8 0b |nA@...a.|........|
|00001070| 09 5c 22 88 cf 0b 09 c0 | 89 24 88 c4 20 89 12 ab |.\".....|.$.. ...|
|00001080| f9 5c 6e 40 c5 98 ac f3 | 5c 6e 40 c6 98 ac ed 5c |.\n@....|\n@....\|
|00001090| 6e 40 d0 98 ab 96 0b c7 | 61 ab 87 5c 6e 41 40 16 |n@......|a..\nA@.|
|000010a0| 11 aa 5c 5c d2 0b 09 5c | 6e 41 40 23 88 aa 52 5c |..\\...\|nA@#..R\|
|000010b0| 6e 40 d3 98 ab 97 0b c7 | 61 ab 87 5c 6e 41 40 16 |n@......|a..\nA@.|
|000010c0| 14 aa 40 d5 0b 09 c0 5c | 6e 41 40 24 88 aa 35 5c |..@....\|nA@$..5\|
|000010d0| 6e 40 d6 98 ab 96 0b c7 | 61 ab 87 ca d7 d8 5c 22 |n@......|a.....\"|
|000010e0| 88 aa 23 d9 d5 0b 09 5c | 6e 41 24 88 aa 19 5c 6e |..#....\|nA$...\n|
|000010f0| 40 c9 98 ab 13 ca da 0b | c7 61 ab 83 c6 aa 84 cc |@.......|.a......|
|00001100| cd 0b 5c 22 5c 22 88 aa | 01 5c 6e ad 8c 5c 6e 40 |..\"\"..|.\n..\n@|
|00001110| c5 98 ab 85 5c 6e 41 40 | aa 81 c7 2a 87 22 20 5b |....\nA@|...*." [|
|00001120| 6e 69 6c 20 6c 6f 67 69 | 6e 20 64 61 74 61 20 6d |nil logi|n data m|
|00001130| 61 63 68 69 6e 65 20 65 | 66 73 2d 6e 65 74 72 63 |achine e|fs-netrc|
|00001140| 2d 6e 65 78 74 2d 74 6f | 6b 65 6e 20 22 6d 61 63 |-next-to|ken "mac|
|00001150| 68 69 6e 65 22 20 22 64 | 65 66 61 75 6c 74 22 20 |hine" "d|efault" |
|00001160| 64 65 66 61 75 6c 74 20 | 65 66 73 2d 73 65 74 2d |default |efs-set-|
|00001170| 75 73 65 72 20 22 6c 6f | 67 69 6e 22 20 65 72 72 |user "lo|gin" err|
|00001180| 6f 72 20 22 65 66 73 20 | 6e 65 74 72 63 20 66 69 |or "efs |netrc fi|
|00001190| 6c 65 20 65 72 72 6f 72 | 3a 20 45 78 70 65 63 74 |le error|: Expect|
|000011a0| 65 64 20 6c 6f 67 69 6e | 20 74 6f 6b 65 6e 20 66 |ed login| token f|
|000011b0| 6f 72 20 25 73 2e 22 20 | 66 6f 72 6d 61 74 20 22 |or %s." |format "|
|000011c0| 6d 61 63 68 69 6e 65 20 | 25 73 22 20 65 66 73 2d |machine |%s" efs-|
|000011d0| 64 65 66 61 75 6c 74 2d | 75 73 65 72 20 65 66 73 |default-|user efs|
|000011e0| 2d 73 65 74 2d 68 6f 73 | 74 2d 75 73 65 72 2d 70 |-set-hos|t-user-p|
|000011f0| 72 6f 70 65 72 74 79 20 | 22 70 61 73 73 77 6f 72 |roperty |"passwor|
|00001200| 64 22 20 65 66 73 2d 64 | 65 66 61 75 6c 74 2d 70 |d" efs-d|efault-p|
|00001210| 61 73 73 77 6f 72 64 20 | 65 66 73 2d 73 65 74 2d |assword |efs-set-|
|00001220| 70 61 73 73 77 64 20 22 | 61 63 63 6f 75 6e 74 22 |passwd "|account"|
|00001230| 20 65 66 73 2d 64 65 66 | 61 75 6c 74 2d 61 63 63 | efs-def|ault-acc|
|00001240| 6f 75 6e 74 20 65 66 73 | 2d 73 65 74 2d 61 63 63 |ount efs|-set-acc|
|00001250| 6f 75 6e 74 20 22 6d 69 | 6e 69 64 69 73 6b 22 20 |ount "mi|nidisk" |
|00001260| 22 65 66 73 20 6e 65 74 | 72 63 20 66 69 6c 65 20 |"efs net|rc file |
|00001270| 65 72 72 6f 72 3a 20 25 | 73 2e 22 20 22 4d 69 6e |error: %|s." "Min|
|00001280| 69 64 69 73 6b 20 74 6f | 6b 65 6e 20 69 73 20 6e |idisk to|ken is n|
|00001290| 6f 74 20 61 6c 6c 6f 77 | 65 64 20 66 6f 72 20 64 |ot allow|ed for d|
|000012a0| 65 66 61 75 6c 74 20 65 | 6e 74 72 79 2e 22 20 61 |efault e|ntry." a|
|000012b0| 70 70 6c 79 20 22 65 66 | 73 20 6e 65 74 72 63 20 |pply "ef|s netrc |
|000012c0| 66 69 6c 65 20 65 72 72 | 6f 72 3a 20 53 65 63 6f |file err|or: Seco|
|000012d0| 6e 64 20 6c 6f 67 69 6e | 20 74 6f 6b 65 6e 20 66 |nd login| token f|
|000012e0| 6f 72 20 25 73 2e 22 5d | 20 36 5d 29 0a 23 40 32 |or %s."]| 6]).#@2|
|000012f0| 32 36 20 50 61 72 73 65 | 20 74 68 65 20 75 73 65 |26 Parse| the use|
|00001300| 72 73 20 7e 2f 2e 6e 65 | 74 72 63 20 66 69 6c 65 |rs ~/.ne|trc file|
|00001310| 2c 20 6f 72 20 66 69 6c | 65 20 73 70 65 63 69 66 |, or fil|e specif|
|00001320| 69 65 64 20 60 62 79 20 | 65 66 73 2d 6e 65 74 72 |ied `by |efs-netr|
|00001330| 63 2d 66 69 6c 65 6e 61 | 6d 65 27 2e 0a 49 66 20 |c-filena|me'..If |
|00001340| 74 68 65 20 66 69 6c 65 | 20 65 78 69 73 74 73 20 |the file| exists |
|00001350| 61 6e 64 20 68 61 73 20 | 74 68 65 20 63 6f 72 72 |and has |the corr|
|00001360| 65 63 74 20 70 65 72 6d | 69 73 73 69 6f 6e 73 20 |ect perm|issions |
|00001370| 74 68 65 6e 20 65 78 74 | 72 61 63 74 20 74 68 65 |then ext|ract the|
|00001380| 0a 60 6d 61 63 68 69 6e | 65 27 2c 20 60 6c 6f 67 |.`machin|e', `log|
|00001390| 69 6e 27 2c 20 60 70 61 | 73 73 77 6f 72 64 27 2c |in', `pa|ssword',|
|000013a0| 20 60 61 63 63 6f 75 6e | 74 27 2c 20 61 6e 64 20 | `accoun|t', and |
|000013b0| 60 6d 69 6e 69 64 69 73 | 6b 27 0a 69 6e 66 6f 72 |`minidis|k'.infor|
|000013c0| 6d 61 74 69 6f 6e 20 66 | 72 6f 6d 20 77 69 74 68 |mation f|rom with|
|000013d0| 69 6e 2e 1f 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |in...(de|falias '|
|000013e0| 65 66 73 2d 70 61 72 73 | 65 2d 6e 65 74 72 63 20 |efs-pars|e-netrc |
|000013f0| 23 5b 6e 69 6c 20 22 08 | 85 94 00 c1 08 21 1a c3 |#[nil ".|.....!..|
|00001400| 18 c4 5c 6e 21 1a c5 5c | 6e 21 1e 06 c3 1e 07 c3 |..\n!..\|n!......|
|00001410| 1e 08 74 ac 8e 0e 06 ad | f2 c9 0e 06 38 0e 5c 6e |..t.....|....8.\n|
|00001420| 6b 3f ad e8 cb 20 70 0e | 0c 1e 0d 1e 0e 1e 0f d0 |k?... p.|........|
|00001430| 8e c3 16 0c 0e 11 ac 98 | d2 0e 06 38 d3 20 61 ab |........|...8. a.|
|00001440| 89 d4 d5 d6 0e 06 38 5c | 22 ac 86 d7 5c 6e 0e 06 |......8\|"...\n..|
|00001450| 5c 22 88 d8 8e 8a d9 da | 21 89 16 07 71 88 db 5c |\"......|!...q..\|
|00001460| 6e 21 88 5c 6e 16 1c dd | 5c 6e 21 16 1e df e0 21 |n!.\n...|\n!....!|
|00001470| 88 e1 e2 0e 23 5c 22 88 | c3 16 1c 65 62 88 6d ac |....#\".|...eb.m.|
|00001480| 89 e4 0e 08 21 89 16 08 | ac 74 2a c9 0e 06 38 89 |....!...|.t*...8.|
|00001490| 16 5c 6e 2c 2e 06 87 22 | 20 5b 65 66 73 2d 6e 65 |.\n,..."| [efs-ne|
|000014a0| 74 72 63 2d 66 69 6c 65 | 6e 61 6d 65 20 65 78 70 |trc-file|name exp|
|000014b0| 61 6e 64 2d 66 69 6c 65 | 2d 6e 61 6d 65 20 66 69 |and-file|-name fi|
|000014c0| 6c 65 20 6e 69 6c 20 65 | 66 73 2d 63 68 61 73 65 |le nil e|fs-chase|
|000014d0| 2d 73 79 6d 6c 69 6e 6b | 73 20 66 69 6c 65 2d 61 |-symlink|s file-a|
|000014e0| 74 74 72 69 62 75 74 65 | 73 20 61 74 74 72 20 6e |ttribute|s attr n|
|000014f0| 65 74 72 63 2d 62 75 66 | 66 65 72 20 6e 65 78 74 |etrc-buf|fer next|
|00001500| 20 35 20 65 66 73 2d 6e | 65 74 72 63 2d 6d 6f 64 | 5 efs-n|etrc-mod|
|00001510| 74 69 6d 65 20 6d 61 74 | 63 68 2d 64 61 74 61 20 |time mat|ch-data |
|00001520| 63 61 73 65 2d 66 6f 6c | 64 2d 73 65 61 72 63 68 |case-fol|d-search|
|00001530| 20 63 66 73 20 62 75 66 | 66 20 6d 61 74 63 68 2d | cfs buf|f match-|
|00001540| 64 61 74 61 20 28 28 62 | 79 74 65 2d 63 6f 64 65 |data ((b|yte-code|
|00001550| 20 22 c0 c1 c2 8f 88 c3 | 0c 21 87 22 20 5b 6e 69 | "......|.!." [ni|
|00001560| 6c 20 28 62 79 74 65 2d | 63 6f 64 65 20 22 8a 08 |l (byte-|code "..|
|00001570| 71 88 09 12 29 c3 87 22 | 20 5b 62 75 66 66 20 63 |q...).."| [buff c|
|00001580| 66 73 20 63 61 73 65 2d | 66 6f 6c 64 2d 73 65 61 |fs case-|fold-sea|
|00001590| 72 63 68 20 6e 69 6c 5d | 20 31 29 20 28 28 65 72 |rch nil]| 1) ((er|
|000015a0| 72 6f 72 29 29 20 73 74 | 6f 72 65 2d 6d 61 74 63 |ror)) st|ore-matc|
|000015b0| 68 2d 64 61 74 61 20 6d | 61 74 63 68 2d 64 61 74 |h-data m|atch-dat|
|000015c0| 61 5d 20 33 29 29 20 65 | 66 73 2d 64 69 73 61 62 |a] 3)) e|fs-disab|
|000015d0| 6c 65 2d 6e 65 74 72 63 | 2d 73 65 63 75 72 69 74 |le-netrc|-securit|
|000015e0| 79 2d 63 68 65 63 6b 20 | 32 20 75 73 65 72 2d 75 |y-check |2 user-u|
|000015f0| 69 64 20 73 74 72 69 6e | 67 2d 6d 61 74 63 68 20 |id strin|g-match |
|00001600| 22 2e 72 2e 2e 2d 2d 2d | 2d 2d 2d 22 20 38 20 65 |".r..---|---" 8 e|
|00001610| 66 73 2d 6e 65 74 72 63 | 2d 73 63 72 65 61 6d 2d |fs-netrc|-scream-|
|00001620| 61 6e 64 2d 79 65 6c 6c | 20 28 28 62 79 74 65 2d |and-yell| ((byte-|
|00001630| 63 6f 64 65 20 22 c0 c1 | c2 8f 87 22 20 5b 6e 69 |code "..|..." [ni|
|00001640| 6c 20 28 62 79 74 65 2d | 63 6f 64 65 20 22 8a 08 |l (byte-|code "..|
|00001650| 71 88 c1 c2 21 88 c3 08 | 21 88 29 c2 87 22 20 5b |q...!...|!.).." [|
|00001660| 6e 65 74 72 63 2d 62 75 | 66 66 65 72 20 73 65 74 |netrc-bu|ffer set|
|00001670| 2d 62 75 66 66 65 72 2d | 6d 6f 64 69 66 69 65 64 |-buffer-|modified|
|00001680| 2d 70 20 6e 69 6c 20 70 | 61 73 73 77 64 2d 6b 69 |-p nil p|asswd-ki|
|00001690| 6c 6c 2d 62 75 66 66 65 | 72 5d 20 32 29 20 28 28 |ll-buffe|r] 2) ((|
|000016a0| 65 72 72 6f 72 29 29 5d | 20 33 29 29 20 67 65 6e |error))]| 3)) gen|
|000016b0| 65 72 61 74 65 2d 6e 65 | 77 2d 62 75 66 66 65 72 |erate-ne|w-buffer|
|000016c0| 20 22 2a 66 74 70 2d 2e | 6e 65 74 72 63 2a 22 20 | "*ftp-.|netrc*" |
|000016d0| 69 6e 73 65 72 74 2d 66 | 69 6c 65 2d 63 6f 6e 74 |insert-f|ile-cont|
|000016e0| 65 6e 74 73 20 62 75 66 | 66 65 72 2d 66 69 6c 65 |ents buf|fer-file|
|000016f0| 2d 6e 61 6d 65 20 66 69 | 6c 65 2d 6e 61 6d 65 2d |-name fi|le-name-|
|00001700| 64 69 72 65 63 74 6f 72 | 79 20 64 65 66 61 75 6c |director|y defaul|
|00001710| 74 2d 64 69 72 65 63 74 | 6f 72 79 20 6e 6f 72 6d |t-direct|ory norm|
|00001720| 61 6c 2d 6d 6f 64 65 20 | 74 20 6d 61 70 63 61 72 |al-mode |t mapcar|
|00001730| 20 66 75 6e 63 61 6c 6c | 20 66 69 6e 64 2d 66 69 | funcall| find-fi|
|00001740| 6c 65 2d 68 6f 6f 6b 73 | 20 65 66 73 2d 70 61 72 |le-hooks| efs-par|
|00001750| 73 65 2d 6e 65 74 72 63 | 2d 67 72 6f 75 70 5d 20 |se-netrc|-group] |
|00001760| 34 20 28 23 24 20 2e 20 | 34 38 35 31 29 20 6e 69 |4 (#$ . |4851) ni|
|00001770| 6c 5d 29 0a 28 64 65 66 | 61 6c 69 61 73 20 27 65 |l]).(def|alias 'e|
|00001780| 66 73 2d 6e 65 74 72 63 | 2d 73 63 72 65 61 6d 2d |fs-netrc|-scream-|
|00001790| 61 6e 64 2d 79 65 6c 6c | 20 23 5b 28 66 69 6c 65 |and-yell| #[(file|
|000017a0| 20 61 74 74 72 29 20 22 | c0 09 38 c2 20 55 3f 1b | attr) "|..8. U?.|
|000017b0| c4 09 38 1d c6 c7 0d 5c | 22 3f 1e 08 0b ac 84 0e |..8....\|"?......|
|000017c0| 08 ad 82 c9 8b 2b 87 22 | 20 5b 32 20 61 74 74 72 |.....+."| [2 attr|
|000017d0| 20 75 73 65 72 2d 75 69 | 64 20 62 61 64 2d 6f 77 | user-ui|d bad-ow|
|000017e0| 6e 20 38 20 6d 6f 64 65 | 73 20 73 74 72 69 6e 67 |n 8 mode|s string|
|000017f0| 2d 6d 61 74 63 68 20 22 | 2e 72 2e 2e 2d 2d 2d 2d |-match "|.r..----|
|00001800| 2d 2d 22 20 62 61 64 2d | 70 72 6f 74 65 63 74 20 |--" bad-|protect |
|00001810| 28 28 62 79 74 65 2d 63 | 6f 64 65 20 22 c0 90 09 |((byte-c|ode "...|
|00001820| ab 87 c2 c3 c4 0d 5c 22 | 21 88 0e 06 ab a2 09 ab |......\"|!.......|
|00001830| 86 c2 c7 21 88 aa 84 c2 | c8 21 88 c2 c9 21 88 09 |...!....|.!...!..|
|00001840| ac 86 c2 0d ca 50 21 88 | c2 c3 cb 0e 0c 5c 22 21 |.....P!.|.....\"!|
|00001850| 88 c2 cd 21 91 88 ce cf | c0 21 21 88 d0 d1 65 64 |...!....|.!!...ed|
|00001860| 5c 22 d2 20 5a d3 5a 21 | 88 0e 06 ad 8c d4 c3 d5 |\". Z.Z!|........|
|00001870| 0d 5c 22 21 ad 84 d6 0d | d7 5c 22 87 22 20 5b 22 |.\"!....|.\"." ["|
|00001880| 2a 48 65 6c 70 2a 22 20 | 62 61 64 2d 6f 77 6e 20 |*Help*" |bad-own |
|00001890| 70 72 69 6e 63 20 66 6f | 72 6d 61 74 20 22 42 65 |princ fo|rmat "Be|
|000018a0| 77 61 72 65 20 74 68 61 | 74 20 79 6f 75 72 20 2e |ware tha|t your .|
|000018b0| 6e 65 74 72 63 20 66 69 | 6c 65 20 25 73 20 69 73 |netrc fi|le %s is|
|000018c0| 20 6e 6f 74 20 6f 77 6e | 65 64 20 62 79 20 79 6f | not own|ed by yo|
|000018d0| 75 2e 5c 6e 22 20 66 69 | 6c 65 20 62 61 64 2d 70 |u.\n" fi|le bad-p|
|000018e0| 72 6f 74 65 63 74 20 22 | 5c 6e 41 6c 73 6f 2c 22 |rotect "|\nAlso,"|
|000018f0| 20 22 42 65 77 61 72 65 | 20 74 68 61 74 22 20 22 | "Beware| that" "|
|00001900| 20 79 6f 75 72 20 2e 6e | 65 74 72 63 20 66 69 6c | your .n|etrc fil|
|00001910| 65 20 22 20 22 20 22 20 | 22 68 61 73 20 70 65 72 |e " " " |"has per|
|00001920| 6d 69 73 73 69 6f 6e 73 | 5c 6e 20 25 73 2e 5c 6e |missions|\n %s.\n|
|00001930| 22 20 6d 6f 64 65 73 20 | 22 5c 6e 49 66 20 74 68 |" modes |"\nIf th|
|00001940| 69 73 20 69 73 20 69 6e | 74 65 6e 74 69 6f 6e 61 |is is in|tentiona|
|00001950| 6c 2c 20 74 68 65 6e 20 | 73 65 74 74 69 6e 67 20 |l, then |setting |
|00001960| 65 66 73 2d 64 69 73 61 | 62 6c 65 2d 6e 65 74 72 |efs-disa|ble-netr|
|00001970| 63 2d 73 65 63 75 72 69 | 74 79 2d 63 68 65 63 6b |c-securi|ty-check|
|00001980| 5c 6e 74 6f 20 74 20 77 | 69 6c 6c 20 69 6e 68 69 |\nto t w|ill inhi|
|00001990| 62 69 74 20 74 68 69 73 | 20 77 61 72 6e 69 6e 67 |bit this| warning|
|000019a0| 20 69 6e 20 74 68 65 20 | 66 75 74 75 72 65 2e 5c | in the |future.\|
|000019b0| 6e 22 20 73 65 6c 65 63 | 74 2d 77 69 6e 64 6f 77 |n" selec|t-window|
|000019c0| 20 67 65 74 2d 62 75 66 | 66 65 72 2d 77 69 6e 64 | get-buf|fer-wind|
|000019d0| 6f 77 20 65 6e 6c 61 72 | 67 65 2d 77 69 6e 64 6f |ow enlar|ge-windo|
|000019e0| 77 20 63 6f 75 6e 74 2d | 6c 69 6e 65 73 20 77 69 |w count-|lines wi|
|000019f0| 6e 64 6f 77 2d 68 65 69 | 67 68 74 20 2d 31 20 79 |ndow-hei|ght -1 y|
|00001a00| 2d 6f 72 2d 6e 2d 70 20 | 22 53 65 74 20 70 65 72 |-or-n-p |"Set per|
|00001a10| 6d 69 73 73 69 6f 6e 73 | 20 6f 6e 20 25 73 20 74 |missions| on %s t|
|00001a20| 6f 20 36 30 30 3f 20 22 | 20 73 65 74 2d 66 69 6c |o 600? "| set-fil|
|00001a30| 65 2d 6d 6f 64 65 73 20 | 33 38 34 5d 20 35 29 29 |e-modes |384] 5))|
|00001a40| 5d 20 33 5d 29 0a 23 40 | 31 30 35 20 52 65 74 75 |] 3]).#@|105 Retu|
|00001a50| 72 6e 20 61 20 6c 69 73 | 74 20 6f 66 20 70 72 65 |rn a lis|t of pre|
|00001a60| 66 69 78 65 73 20 6f 66 | 20 74 68 65 20 66 6f 72 |fixes of| the for|
|00001a70| 6d 20 22 75 73 65 72 40 | 68 6f 73 74 3a 22 2e 0a |m "user@|host:"..|
|00001a80| 55 73 65 64 20 77 68 65 | 6e 20 63 6f 6d 70 6c 65 |Used whe|n comple|
|00001a90| 74 69 6f 6e 20 69 73 20 | 64 6f 6e 65 20 69 6e 20 |tion is |done in |
|00001aa0| 74 68 65 20 72 6f 6f 74 | 20 64 69 72 65 63 74 6f |the root| directo|
|00001ab0| 72 79 2e 1f 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |ry...(de|falias '|
|00001ac0| 65 66 73 2d 67 65 6e 65 | 72 61 74 65 2d 72 6f 6f |efs-gene|rate-roo|
|00001ad0| 74 2d 70 72 65 66 69 78 | 65 73 20 23 5b 6e 69 6c |t-prefix|es #[nil|
|00001ae0| 20 22 c0 20 88 c1 20 70 | 5c 6e 1b 1c 1d c6 8e c7 | ". .. p|\n......|
|00001af0| 12 c7 1e 08 c9 ca 0e 0b | 5c 22 88 c9 cc 0e 0d 5c |........|\".....\|
|00001b00| 22 88 0e 08 ac 8b ce cf | 0e 10 5c 22 ab 84 c7 43 |".......|..\"...C|
|00001b10| aa 82 0e 08 2d 87 22 20 | 5b 65 66 73 2d 70 61 72 |....-." |[efs-par|
|00001b20| 73 65 2d 6e 65 74 72 63 | 20 6d 61 74 63 68 2d 64 |se-netrc| match-d|
|00001b30| 61 74 61 20 63 61 73 65 | 2d 66 6f 6c 64 2d 73 65 |ata case|-fold-se|
|00001b40| 61 72 63 68 20 63 66 73 | 20 62 75 66 66 20 6d 61 |arch cfs| buff ma|
|00001b50| 74 63 68 2d 64 61 74 61 | 20 28 28 62 79 74 65 2d |tch-data| ((byte-|
|00001b60| 63 6f 64 65 20 22 c0 c1 | c2 8f 88 c3 0c 21 87 22 |code "..|.....!."|
|00001b70| 20 5b 6e 69 6c 20 28 62 | 79 74 65 2d 63 6f 64 65 | [nil (b|yte-code|
|00001b80| 20 22 8a 08 71 88 09 12 | 29 c3 87 22 20 5b 62 75 | "..q...|).." [bu|
|00001b90| 66 66 20 63 66 73 20 63 | 61 73 65 2d 66 6f 6c 64 |ff cfs c|ase-fold|
|00001ba0| 2d 73 65 61 72 63 68 20 | 6e 69 6c 5d 20 31 29 20 |-search |nil] 1) |
|00001bb0| 28 28 65 72 72 6f 72 29 | 29 20 73 74 6f 72 65 2d |((error)|) store-|
|00001bc0| 6d 61 74 63 68 2d 64 61 | 74 61 20 6d 61 74 63 68 |match-da|ta match|
|00001bd0| 2d 64 61 74 61 5d 20 33 | 29 29 20 6e 69 6c 20 72 |-data] 3|)) nil r|
|00001be0| 65 73 20 65 66 73 2d 6d | 61 70 2d 68 61 73 68 74 |es efs-m|ap-hasht|
|00001bf0| 61 62 6c 65 20 23 5b 28 | 6b 65 79 20 76 61 6c 75 |able #[(|key valu|
|00001c00| 65 29 20 22 c0 c1 5c 6e | 5c 22 ad 9e 5c 6e c3 c4 |e) "..\n|\"..\n..|
|00001c10| 94 4f 5c 6e c4 95 c5 4f | 1e 06 1e 07 c8 0e 09 0e |.O\n...O|........|
|00001c20| 06 0e 07 23 43 0e 5c 6e | 42 89 16 5c 6e 2a 87 22 |...#C.\n|B..\n*."|
|00001c30| 20 5b 73 74 72 69 6e 67 | 2d 6d 61 74 63 68 20 22 | [string|-match "|
|00001c40| 5e 5b 5e 2f 5d 2b 5c 5c | 28 2f 5c 5c 29 2e 2b 24 |^[^/]+\\|(/\\).+$|
|00001c50| 22 20 6b 65 79 20 30 20 | 31 20 6e 69 6c 20 75 73 |" key 0 |1 nil us|
|00001c60| 65 72 20 68 6f 73 74 20 | 66 6f 72 6d 61 74 20 65 |er host |format e|
|00001c70| 66 73 2d 70 61 74 68 2d | 75 73 65 72 2d 61 74 2d |fs-path-|user-at-|
|00001c80| 68 6f 73 74 2d 66 6f 72 | 6d 61 74 20 72 65 73 5d |host-for|mat res]|
|00001c90| 20 34 5d 20 65 66 73 2d | 68 6f 73 74 2d 75 73 65 | 4] efs-|host-use|
|00001ca0| 72 2d 68 61 73 68 74 61 | 62 6c 65 20 23 5b 28 68 |r-hashta|ble #[(h|
|00001cb0| 6f 73 74 20 75 73 65 72 | 29 20 22 c0 09 5c 6e 5c |ost user|) "..\n\|
|00001cc0| 22 43 0b 42 89 13 87 22 | 20 5b 66 6f 72 6d 61 74 |"C.B..."| [format|
|00001cd0| 20 65 66 73 2d 70 61 74 | 68 2d 68 6f 73 74 2d 66 | efs-pat|h-host-f|
|00001ce0| 6f 72 6d 61 74 20 68 6f | 73 74 20 72 65 73 5d 20 |ormat ho|st res] |
|00001cf0| 33 5d 20 65 66 73 2d 68 | 6f 73 74 2d 68 61 73 68 |3] efs-h|ost-hash|
|00001d00| 74 61 62 6c 65 20 73 74 | 72 69 6e 67 2d 6d 61 74 |table st|ring-mat|
|00001d10| 63 68 20 22 5e 31 5b 30 | 2d 38 5d 5c 5c 2e 5c 5c |ch "^1[0|-8]\\.\\|
|00001d20| 7c 5e 5b 30 2d 39 5d 5c | 5c 2e 22 20 65 6d 61 63 ||^[0-9]\|\." emac|
|00001d30| 73 2d 76 65 72 73 69 6f | 6e 5d 20 33 20 28 23 24 |s-versio|n] 3 (#$|
|00001d40| 20 2e 20 36 37 33 32 29 | 5d 29 0a 28 64 65 66 61 | . 6732)|]).(defa|
|00001d50| 6c 69 61 73 20 27 65 66 | 73 2d 72 6f 6f 74 2d 66 |lias 'ef|s-root-f|
|00001d60| 69 6c 65 2d 6e 61 6d 65 | 2d 61 6c 6c 2d 63 6f 6d |ile-name|-all-com|
|00001d70| 70 6c 65 74 69 6f 6e 73 | 20 23 5b 28 66 69 6c 65 |pletions| #[(file|
|00001d80| 20 64 69 72 29 20 22 c0 | c1 21 1a c3 0c c5 20 5c | dir) ".|.!.... \|
|00001d90| 22 c6 0c 0e 07 5c 22 a4 | 29 87 22 20 5b 65 66 73 |"....\".|)." [efs|
|00001da0| 2d 66 69 6c 65 2d 6e 61 | 6d 65 2d 68 61 6e 64 6c |-file-na|me-handl|
|00001db0| 65 72 2d 61 6c 69 73 74 | 2d 73 61 6e 73 2d 66 6e |er-alist|-sans-fn|
|00001dc0| 20 65 66 73 2d 72 6f 6f | 74 2d 68 61 6e 64 6c 65 | efs-roo|t-handle|
|00001dd0| 72 2d 66 75 6e 63 74 69 | 6f 6e 20 66 69 6c 65 2d |r-functi|on file-|
|00001de0| 6e 61 6d 65 2d 68 61 6e | 64 6c 65 72 2d 61 6c 69 |name-han|dler-ali|
|00001df0| 73 74 20 61 6c 6c 2d 63 | 6f 6d 70 6c 65 74 69 6f |st all-c|ompletio|
|00001e00| 6e 73 20 66 69 6c 65 20 | 65 66 73 2d 67 65 6e 65 |ns file |efs-gene|
|00001e10| 72 61 74 65 2d 72 6f 6f | 74 2d 70 72 65 66 69 78 |rate-roo|t-prefix|
|00001e20| 65 73 20 66 69 6c 65 2d | 6e 61 6d 65 2d 61 6c 6c |es file-|name-all|
|00001e30| 2d 63 6f 6d 70 6c 65 74 | 69 6f 6e 73 20 64 69 72 |-complet|ions dir|
|00001e40| 5d 20 34 5d 29 0a 28 64 | 65 66 61 6c 69 61 73 20 |] 4]).(d|efalias |
|00001e50| 27 65 66 73 2d 72 6f 6f | 74 2d 66 69 6c 65 2d 6e |'efs-roo|t-file-n|
|00001e60| 61 6d 65 2d 63 6f 6d 70 | 6c 65 74 69 6f 6e 20 23 |ame-comp|letion #|
|00001e70| 5b 28 66 69 6c 65 20 64 | 69 72 29 20 22 c0 c1 21 |[(file d|ir) "..!|
|00001e80| 1a c3 0c c5 20 c6 c7 c8 | 0c c9 5c 22 5c 22 a4 5c |.... ...|..\"\".\|
|00001e90| 22 29 87 22 20 5b 65 66 | 73 2d 66 69 6c 65 2d 6e |")." [ef|s-file-n|
|00001ea0| 61 6d 65 2d 68 61 6e 64 | 6c 65 72 2d 61 6c 69 73 |ame-hand|ler-alis|
|00001eb0| 74 2d 73 61 6e 73 2d 66 | 6e 20 65 66 73 2d 72 6f |t-sans-f|n efs-ro|
|00001ec0| 6f 74 2d 68 61 6e 64 6c | 65 72 2d 66 75 6e 63 74 |ot-handl|er-funct|
|00001ed0| 69 6f 6e 20 66 69 6c 65 | 2d 6e 61 6d 65 2d 68 61 |ion file|-name-ha|
|00001ee0| 6e 64 6c 65 72 2d 61 6c | 69 73 74 20 74 72 79 2d |ndler-al|ist try-|
|00001ef0| 63 6f 6d 70 6c 65 74 69 | 6f 6e 20 66 69 6c 65 20 |completi|on file |
|00001f00| 65 66 73 2d 67 65 6e 65 | 72 61 74 65 2d 72 6f 6f |efs-gene|rate-roo|
|00001f10| 74 2d 70 72 65 66 69 78 | 65 73 20 6d 61 70 63 61 |t-prefix|es mapca|
|00001f20| 72 20 6c 69 73 74 20 66 | 69 6c 65 2d 6e 61 6d 65 |r list f|ile-name|
|00001f30| 2d 61 6c 6c 2d 63 6f 6d | 70 6c 65 74 69 6f 6e 73 |-all-com|pletions|
|00001f40| 20 22 2f 22 5d 20 38 5d | 29 0a                   | "/"] 8]|).      |
+--------+-------------------------+-------------------------+--------+--------+